home *** CD-ROM | disk | FTP | other *** search
/ Developer Helper 1: Phil & Dave's Excellent CD / Excellent CD HFS.raw / HyperCard / HyperCard 1.2.2 International / HyperCard Danish (DK-1.2.2) / Idestakke / Baggrundsideer / background_3068.txt < prev    next >
Text File  |  1988-12-19  |  4KB  |  211 lines
  1. -- background: 3068 from stack: in
  2. -- bmap block id: 23504
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openBackground
  8.   push recent card
  9. end openBackground
  10.  
  11.  
  12. -- part 5 (field)
  13. -- low flags: 01
  14. -- high flags: 0000
  15. -- rect: left=89 top=62 right=172 bottom=416
  16. -- title width / last selected line: 0
  17. -- icon id / first selected line: 0 / 0
  18. -- text alignment: 0
  19. -- font id: 3
  20. -- text size: 14
  21. -- style flags: 0
  22. -- line height: 18
  23. -- part name: Navn og adresse
  24.  
  25.  
  26. -- part 6 (field)
  27. -- low flags: 01
  28. -- high flags: 0000
  29. -- rect: left=89 top=181 right=236 bottom=416
  30. -- title width / last selected line: 0
  31. -- icon id / first selected line: 0 / 0
  32. -- text alignment: 0
  33. -- font id: 3
  34. -- text size: 14
  35. -- style flags: 0
  36. -- line height: 18
  37. -- part name: Telefon
  38.  
  39.  
  40. -- part 7 (button)
  41. -- low flags: 00
  42. -- high flags: 0000
  43. -- rect: left=82 top=243 right=279 bottom=130
  44. -- title width / last selected line: 0
  45. -- icon id / first selected line: 32670 / 32670
  46. -- text alignment: 1
  47. -- font id: 0
  48. -- text size: 12
  49. -- style flags: 0
  50. -- line height: 16
  51. -- part name: Vis
  52. ----- HyperTalk script -----
  53. on mouseUp
  54.   show all cards
  55. end mouseUp
  56.  
  57.  
  58.  
  59. -- part 11 (button)
  60. -- low flags: 00
  61. -- high flags: 0000
  62. -- rect: left=323 top=248 right=273 bottom=357
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 15972 / 15972
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: gå til kalender
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   set lockScreen to true
  74.   go to stack "Kalender"
  75.   goWeekly the seconds
  76. end mouseUp
  77.  
  78.  
  79.  
  80.  
  81. -- part 12 (button)
  82. -- low flags: 00
  83. -- high flags: 0000
  84. -- rect: left=355 top=248 right=273 bottom=394
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 10610 / 10610
  87. -- text alignment: 1
  88. -- font id: 0
  89. -- text size: 12
  90. -- style flags: 0
  91. -- line height: 16
  92. -- part name: ring
  93. ----- HyperTalk script -----
  94. on mouseUp
  95.   get the selection
  96.   if it is empty then get the message
  97.   if it is empty then ask "Ring til hvilket nummer?"
  98.   if it is not empty then
  99.     dial it
  100.   end if
  101. end mouseUp
  102.  
  103.  
  104.  
  105. -- part 16 (button)
  106. -- low flags: 00
  107. -- high flags: 0000
  108. -- rect: left=227 top=247 right=272 bottom=254
  109. -- title width / last selected line: 0
  110. -- icon id / first selected line: 1014 / 1014
  111. -- text alignment: 1
  112. -- font id: 0
  113. -- text size: 12
  114. -- style flags: 0
  115. -- line height: 16
  116. -- part name: Forrige
  117. ----- HyperTalk script -----
  118. on mouseUp
  119.   visual effect wipe right
  120.   go to previous card
  121. end mouseUp
  122.  
  123.  
  124.  
  125. -- part 17 (button)
  126. -- low flags: 00
  127. -- high flags: 0000
  128. -- rect: left=258 top=247 right=272 bottom=285
  129. -- title width / last selected line: 0
  130. -- icon id / first selected line: 1013 / 1013
  131. -- text alignment: 1
  132. -- font id: 0
  133. -- text size: 12
  134. -- style flags: 0
  135. -- line height: 16
  136. -- part name: Næste
  137. ----- HyperTalk script -----
  138. on mouseUp
  139.   visual effect wipe left
  140.   go to next card
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 21 (button)
  146. -- low flags: 00
  147. -- high flags: 0000
  148. -- rect: left=395 top=245 right=273 bottom=432
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 1012 / 1012
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: Retur
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   visual effect iris close
  160.   pop card
  161. end mouseUp
  162.  
  163.  
  164.  
  165. -- part 22 (button)
  166. -- low flags: 00
  167. -- high flags: 0004
  168. -- rect: left=3 top=23 right=52 bottom=35
  169. -- title width / last selected line: 0
  170. -- icon id / first selected line: 21700 / 21700
  171. -- text alignment: 1
  172. -- font id: 0
  173. -- text size: 12
  174. -- style flags: 0
  175. -- line height: 16
  176. -- part name: Hjem
  177. ----- HyperTalk script -----
  178. on mouseUp
  179.   visual effect iris open
  180.   go Home
  181. end mouseUp
  182.  
  183.  
  184.  
  185. -- part 23 (button)
  186. -- low flags: 00
  187. -- high flags: 0000
  188. -- rect: left=136 top=241 right=277 bottom=184
  189. -- title width / last selected line: 0
  190. -- icon id / first selected line: 20186 / 20186
  191. -- text alignment: 1
  192. -- font id: 0
  193. -- text size: 12
  194. -- style flags: 0
  195. -- line height: 16
  196. -- part name: 
  197. ----- HyperTalk script -----
  198. on mouseUp
  199.   if the name of this stack contains "Baggrundsideer"
  200.   then
  201.   show card field 2  -- explain why not sort here
  202. else
  203.   answer "Sort√©r alle kortene i denne stak efter:" with "Fornavn" or "Efternavn" or "Annuller"
  204.   if it is "Fornavn"
  205.   then sort by first word of first line of field "Navn og adresse"
  206. else if it is "Efternavn"
  207. then sort by last word of first line of field "Navn og adresse"
  208. end if
  209. end mouseUp
  210.  
  211.